﻿Public Class MantenimientoInsertar
    Private mMantenimientoBE As BE.Usuarios
    Private mMantenimientoBS As BS.Usuarios

    Private Sub btnCerrar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCerrar.Click
        Me.Close()
    End Sub

    Private Sub btnGuardar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGuardar.Click
        Me.mMantenimientoBS = New BS.Usuarios
        Me.mMantenimientoBE = New BE.Usuarios

        mMantenimientoBE.NombreCompleto = txtNombreCompleto.Text.Trim
        mMantenimientoBE.Identificacion = txtNumeroId.Text.Trim
        mMantenimientoBE.NombreUsuario = txtNombreUsuario.Text.Trim
        mMantenimientoBE.Contraseña = txtContraseña.Text.Trim
        If cbPerfil.Text = "Cajero" Then
            mMantenimientoBE.Perfil = 1
        Else
            mMantenimientoBE.Perfil = 2
        End If


        Try
            If txtNombreCompleto.Text = "" Then
                MessageBox.Show("El Campo Nombre Completo esta Vacio")
            Else
                mMantenimientoBE.Estado = 2
                mMantenimientoBS.Agregar(mMantenimientoBE)
                MessageBox.Show("Datos almacenados correctamente")
            End If



        Catch ex As Exception
            MessageBox.Show("Problemas al Insertar Los datos")
        End Try

        Me.DialogResult = Windows.Forms.DialogResult.OK
        Me.Close()
    End Sub
End Class